home *** CD-ROM | disk | FTP | other *** search
- /* CVS $Id: wstcl.h,v 1.2 1994/04/28 16:35:40 shonagh Exp $ */
- /*-------------------------------------------------------------------------
- Copyright (c) 1994 The Santa Cruz Operation, Inc.
- -------------------------------------------------------------------------
- All rights reserved. No part of this program or publication may be
- reproduced, transmitted, transcribed, stored in a retrieval system,
- or translated into any language or computer language, in any form or
- by any means, electronic, mechanical, magnetic, optical, chemical,
- biological, or otherwise, without the prior written permission of:
-
- The Santa Cruz Operation, Inc. (408) 425-7222
- 400 Encinal St, Santa Cruz, CA 95060 USA
- -------------------------------------------------------------------------
-
-
- #ifndef VTCL_H
-
- #define VTCL_H
-
- #include <tcl.h>
-
- /* Function prototype for function called in response to input or remove */
- /* the function should return a Tcl status TCL_OK etc. */
- typedef int (*INPUT_PROC)(Tcl_Interp *, int, caddr_t);
-
- enum { INPUT_SUCCESS = 0, /* everything ok */
- INPUT_DUP, /* duplicate file descrip */
- INPUT_NOT_FOUND, /* couldn't find file descip in CRemoveInput */
- INPUT_MEM_ALLOC, /* memory allocation error */
- INPUT_FAILURE /* generic failure code */
- };
-
- #ifdef __cplusplus
- extern "C" {
- #endif
-
- extern int WsAddInput(FILE *, int, INPUT_PROC, INPUT_PROC, caddr_t);
- extern int WsRemoveInput(int);
-
- #ifdef __cplusplus
- }
- #endif
-
- #endif /* VTCL_H */
-
-